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A MERRY CHRISTMAS TO ALL OUR CLUB MEMBERS, AND MAY YOU 
HAVE A VERY SUCCESSFUL NEW YEAR. 


Now here is your christmas present. This issue is free. It 
does not count in your subscribed year! We are ahead with our 
finiances, so decided this was the better way to refund some. 


I hasten to add that contributations used in this issue wil] 
receive the usual credit. 


Inside you will find the rules for our design competition. 
There is also a sample of what can be done. I hope to see a big 
influx of entries, 


This sample is really worth studying. There is very clever use 
of the READ-DATA routine that I have not often seen used. Not only 
the print characters but also the margins and line feeds are 
controlled by the READ-DATA routine. When first sighted I thought 
no hope for the VZ, but loading it, it did run. There is one 
statement had me puzzled in line 180...... READY. I pondered on 
that a long time. Then the penny dropped. It was not READY but 
READ Y. When David Wood's series finishes, I shall go back to 
BASIC MADE EASY and explain this program. In the meantime see if 
you can follow it. 


Our stand at the Box Hill SELL-SWAP was rather a flop. Only 2 
people paid any attention to us. We were hoping to get some 
newmembers from it. A lot of our members have gone to IBM or. the 
computers used at their schools. 


So for this year I will say Cheerio. Let me have some input in 
the coming year. 





" 


DESIGN COMPETITION RULES 


As I have not received any suggestions for this project, I 
have taken it upon myself to write them. 


1. There will be only one class. There are a8 few will be 
barred. They are the ‘experts’. They will know who I refer to. 
They have been contributing articles far in advance to what we 


hope to attain. 


2: The competition 15 for a design that wil! reproduce on 
the V7 screen or printer. The program that produces it must be 
submitted so that others may do So. It may be for HI or LO 
resolution and for color or black and white. It must be done on a 
standard VZ. Extended Basic or Extended Dos may not be used. 


s. Entries will be Judged by all members attending the July 
1992 meeting, acting as a committee. Their verdict will be final. 
Results will be in the JULY-AUGUST edition. 


Р 4. The prize will бе 1 year's membership to the VZ DOWN UNDER 
LUB. 


5. А11 entries will be published over a period, and the 
author will receive the usual credit of one issue. 


6. A statement that it is your own work must be provided. 
In this issue is a sample. It may be an entry. I do not have а 


statement that it is his own work. Be that as it may it is well 
worth studying the programming style. 


So, go to it and good luck. 
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UN 
Ы BUN И 5 CLS: 
" BUNNYB NYBUNNYBUN 10 LPRINT " BUNNY 
54 BUNNY BUN UNNYBUNNYEUN 30. LPRINT: LPRINT :LPRINT 
r UNNY BUNNY NNY BUNNY BUNNYB 
4 = 120 FOR I=OTO4:READB (I) :NEXTI 
E NY BUNNY BUNN Yous BUNNY BUNNY 140 L=64 
3 YBUNNYBUNNY NNY BUNNY BUNNY BUNN 160 LPRINT 
^ BUNNY BUNNY B UNNY BUNNY BUNNY BUN 170 READX: IFX«OTHEN160 
A UNNYBUNNTBU BUNNYBUNNYBUNNYB 
3 | 175 IFX>128THEN240 
1 NNYBUNNYBUN YBUNNYBUNNTBUNNY м 
: 180 LPRINT TAB OQ ; : READY 
NYBUNNYBUNNY NYBUNNY BUNNY BUNN = quum 
rere | 190 FORT=XTOY: J=I-5* INT (1/5) 
Y BUNNY BUNNYB NNY BUNNY BUNNY BU ! 
: ae | 200 LPRINTCHRS (L*B (J)) ; 
BUNNYBUNNYBU — UNNTBUNNYBUNNYB 210 NEXT I 
UNNYBUNNYBUN XBUNNYBUNNYBUNN 220 GOTO 170 


240 GOSUB260 : GOTO450 
260 FORI=1T06:LPRINTCHRS (10) 3 NEXT I 


d YBUNNY BUNNY BUNNY BUNN 270 RETURN 

enh BUNNAU 290 DATA2, 21, 14, 14,25 

4 4. 500 DATAT 2, -1,0,2,45,50,-1,0,5,45,52,- 

1 м 510 ПАТА1,9,57,50,-1,2,11,56,50,-1,5,15, 
NYBUNNYBUNNY BUNNY B 34,49,-1,4,14, 32,48, -1 


520 ОАТА5,15,51,47,-1,6,16,50,45,-1,7,17 
,29,44,-1,8,19,28,45,-1 

550 DATA9, 20, 27,41,-1,10,21,26,40,-1,11, 
22,25,58,-1,12,22,24,56 

555 DATA-1 

540 ОАТА15,54,-1,14,55,-1,15,51,-1,17,29 
,71,18,27,-1 

550 DATA19,26,-1,16,28,-1,15,30,-1,11, 51 
,71,10,32, - 

560 ОАТА8,55,-1,7,54,-1,6,15,16,34,-1,5, 
12,16,35,-1 

5/0 Pag 12,16,55,71,5,12,15,25,-1,2, 35 
,71,1,35, -1 

580 ОАТА2,54,-1,5,54,-1,4,55,-1,6,55,-1, 
10, 52,34, 54, –1 

590 ОАТА14, 17,19, 25, 28,51,35, 55,-1,15,19 
a 25, 50, 56, 56, -1 

400 DATAI4, 18,21,21,24,30,37,37,-1, 13,18 
,25,29,55,58,-1 | 
410 ОАТА12,29,31,55,-1,11,15,17,17,19,19 
,22,22,24,31,-1 

420 DATAIO,11,17,18,22, 22,24, 24,29, 29,-1 
120 ОАТА22,25,26,29,-1,27,29,-1,28,29, -1 


450 ЕМО 


7) GEL THE SAME PRINTOUT, ALTER THESE LINES AS THS. 
FOR &EPSMW COMPATIP BLE PRINTERS. 


5 LPRINTCHR$ (27) ; CHRS (64); 
7 LPRINT CHRS (27) ;CHRS (104) ;CHRS (1); 
10 LPRINT ” BUNNY 
RINT CHRS (27) ;CHRS (64) ; :LPRINTCHRS (27) :CH | 
25 LPRINTCHRS (27) ;CHR$ (108) : CHRE (10) ; md 
30 'LPRINT:LPRINT em 








ROBOTICS AND ТНЕ У2 
Ry BEN HOBSON апа DAVE MAUNDER 


In the last few months we have been experimenting with 
computer controlled vehicles. Not much is required in the 
form оғ electronics. The major difficulty is the 
constructing of a suitable vehicle. One way we built а 
vehicle was out of TECHNICAL LEGO using cogs to gear down 
the drive to tank like tread. The other way is to convert 
an old remote controlled car. These come in two types. One 
is controlled via a four way cable. The other is radio 
controlled. Either will do as long as you can change 
polarity to the motors with a double pole relay. In one of 
the prototypes, a radio controlled car was used. The 
transmitter was missing and as such the control circuitry 
was built into the actual car, with a twelve way cable 
running to the computer and power supply. As the circuit 
is so simple, construction details are left up to the 
individual. 

The circuit is a modification of a circuit which 
appeared in the USBORNE book, “FRACTICAL THINGS ТО DO WITH 
A MICROCOMFUTER’. The original circuit did not have the 
capacitors of resistors, as it was designed for a БЕС or 
Similar computer which obviously has the Зу supply 
entirely seperate from the data lines. As such it did not 
work оп the Vz. The resistors simply provide a current 
difference sufficient to turn on the transistors. The 
diodes and capacitors absorb any spikes produced by the 
Switching of the relays. Without them, fast switching will 
at certain times hang the VZ. The single pole relay is the 
power on / off relay. It turns on or off power to the 
motors. This is necessary because the motor relays only 
reverse the polarity of the motors and such do not turn 
the motors off. In the circuit diagram the relays are 
represented by a little blob with a line either side. The 
blob is the common connection. 

The bumper switches are two normally open micro 
Switches. They are there to sense if your robot has hit 
anything. Connect them together via a strip of cardboard 
or tin to form a semi circular shape. This way any object 
іп hitting the bumper will activate either or both 
ewitches. Two bumper circuits are shown. It is up to you 
which one to use if any. Two bumpers can be used, one at 
the front and one at the back. 

Motors can be anything at all. Cassette motors 
appropriately geared are ideal. Just make sure they rotate 
at the same speed or the vehicle will veer to one side. 
The power supply can be either a battery or a plug pack 
transformer. Just don’t try and use the VZ. If for some 
reason the motors stall, they will place an excessive load 
on the У2° 5 power supply and may damage it. Besides that 
it is doubtful if enough current can be supplied anyway. 
Тһе VZ*s regulator сап only supply one amp and most of 
this is used up by memory expansions, disk controllers 
etc. To use the printer interface for the vehicle a small 


4. 


modification is necessary. A Sv supply must be available 
at the centronics plug. Open up your printer interface and 
position it so the edge connector is forward and the FCB 
tracks are uppermost. Solder a wire to FIN 4 of the edge 
connector. This can be located by counting to the fourth 
pin from the left on the row of pins closest to the VZ 
side of the interface. To double check the pin behind 
should be connected to FIN 4 also. Although in older 
interfaces this may not be so. Now wind the wire around 
the cable, being sure to loop it through the straining 
clamp and connect it to а spare pin on the centronics 
plug. Centronics plugs have the pin numbers labelled to 
avoid confusion. In most cases FIN 36 is not used but you 
should check your printer manual to be sure. If pin 56 is 
used by the printer the 5v will disturb operation of the 
printer. However 99% of printers stick to the industrial 
standard layout and, according to that FIN 36 із nat used. 
Reassemble the interface and check that Sv is available 
between FIN 36 (or your choice of pin) and FIN 16. It all 
is well you can build your vehicle. 

The centronics pins and their functions are as follows 
РІМ 2 thru 9 - Data lines © thru 7 


РІМ 11 ~ Busy / ready 
РІМ 16 ~ Ground 
FIN 26 ~ Sv 


Writing software is easily achieved from BASIC. A 
simple GUT statement turns the data lines on or off. To 
calculate these values place a binary 1 in the appropriate 
data line number that corresponds to the relay you want 
turned on and convert this to decimal. Then type something 
like OUT 14,54. The port you send it to depends on your 
interface but try 12, 13, 14, 135. 

To test your bumper you simply type 

A=INF(O) +: IF A=24 THEN GOSUB 1000 ELSE GOTO .O 
The value for (à can be discovered by the simple program. 
10 A=INF C(O) 
20 FRINT A 
20 GOTO 10 
Fress the bumper switches a few times and observe what the 
resulting number is. 

That is all except for a sample program. It can be 
expanded to however you wish but each program depends on 
the individual vehicle. 











GAMES COLUMN 


He's back again. (and only just made it. Ed.), and his 
exaes have finished (over a week late Ed.), just in tiae for 
another VZDU gases coluan. Hve even hear fron вове people 
since the last edition.!!!! Peter Watson has once aore 
quietly blitzed the High Scores chart, while still finding 
tiae to hit us with Бове electifying gaae hints. Thanks 
Peter. I also have to say Hello and thank you to Bernice 
Ü'Mahoney and Tia and Mitch Pendlebury for their high score 
contributions. Thanks Guys. VZ gaming is alive and kicking. 


One thing that still remains bare though is this 


bit which I used to set aside for Adventure даве reviews. 


Unfortunately it seeas i've run out of adventures to review. 
Although I would be very interested to hear from any of David 
Wond's pupils from his adventure writing series. VI adventure 
gases need sosething new, and Va sure there are sany out 
there who are capable of writing their own stuff. I ayself 
plan to spend some time over ву long Christaas holiday 
revising  David'sseries іп ап effort to create ву OWN 
aasterpiece. Let's see what we can COME Up with. 


HOT HANDY AND HELPFUL 


LUNAR LANDER. Don’t land on a fuel pad until your fuel 
leve] drops to about 2000 or less. There are 3 pads aarked 
$000 points, but the left-hand one is actually a 3000 point 
pad that has been ais-lahbeled.---Peter Watson. 


PLANET PATROL. Always press the FIRE button before 
jumping over any obstacle, as there is often another on the 
far side of the thing you juap over.--Peter Watson. 


SPACE RAN. Just a small hint for those High Score 
Chasers. I’ve found pleanty of points can be ade by 
knocking off a few ships at the start of each stage and then 
waiting for each reaaining ship to turn into tise boabs 
before shooting thea. If you destroy the tiae bombs quickly 
hundreds of points can be gained from each stage. 


QUESTIONS and 


2977 WO QUESTIONS? Surely we are not all content with 
pur VZ games??? 


TIPS ASTEROIDS 


QUERIES 


HIGH SCORES 


GAME SCORE LEVEL HOLDER 
DAWN PATROL 18100 Paul Frantz 
CRASH 88! Matthew McLean 
DIG QUT 92500 Kenley McLean 
HAMBURGER SAM 31000 Roger McLean 
LADDER CHALLENGE 23970 Peter Watson 
KAMIKAZE 113410 Peter Watson 
V2 INVADERS 30160 Peter Watson 
GALAXON 328460 Matthew Mclean 
PENGUIN 2800 Matthew McLean 
LUNAR LANDER 82520 Peter Watson 
GUPER SHAKE 1918 Peter Watson 
MAZE OF ARGON 78306 Peter Watson 
110000 Peter McLean 
CIRCUS 3180 Matthew McLean 
PANIK 11090 artin Wedgwood 
HOPPY 25550 Matthew McLean 
GHOST HUNTER 23400 Chris McLean 
KNIGHTs & DRAGONS 3300 EASY Peter Watson 
KNIGHTS & DRAGONS 1200 EXPERT Peter Watson 
SPACE RAM 1441 Matthew McLean 
MISSILE ATTACK 52000 Heru McLean 
BUST QUT 2500 Peter Watson 
PLANET PATROL 1091 Peter Watson 
DEFENCE PEN. 1353 Peter Watson 
PHAROAH'S CURSE 135 SHILL 5 Peter Watson 
STAR BLASTER 480 Matthew McLean 


We don't have the level for this score. l think would BE 
5, Matt will verify it for the next edition. (Ға.) 


STAR BLASTER 787 LEVEL 1 Tie Pendelbury 
STAR BLASTER 683 LEVEL 2 Tia Pendelbury 
STAR BLASTER 625 LEVEL 3 Tia Pendelbury 
STAR BLASTER 419 LEVEL 4 Tia Pendelbury 
STAR BLASTER 219 LEVEL 5 Tia Pendelbury 


Tine up for ae again. It’s been brief but we are workig on 
waking it bigger. I hope everyone has a great Хваѕ, апі an 
even better New Year. The Xaas break should give us all a 
chance to get into some serious V7 gasing.' Well I hope so. 


Anyhow as always, see you next edition. 


Please send all your hints, high scores and questions and 
reviews in ta:- 


Paul Frantz, 25 Crocker St. KIRWAN. Q'1d., 4817. 
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ADVENTURE GAMES- LONGER ROOM DESCRIPTIGS 


ET ot 


PARE 
> a 


Some time ago I mentioned that if you wanted to have long room ^ 


descriptions, you could use a method known as tokenising. This method 
atorea the deacriptiona in DATA statements with many of the commonly 
used words instead replaced by a single token. The tokens used in our 
case will be inverse characters, which are the ASCII characters from 
192 to 255. This leaves 63 characters for tokens, with a 64th 
character used for a different purpose which we will get to later. 

However I then went оп to say that programming this method was 
rather tedious, as you had to look for common words, assign a token 
for each word, and then type in each data statement, replacing words 
with the inverse tokens where this is required. I find that this task 
ia much better left to a computer, so I have written a program to deal 
with this. (The program is based on the “Single Line Data Statement" 
program which appeared in the March 1987 edition of VZ User.) 

The program won’t discover commonly used words for you, so you 
will still have to do this yourself. As a rule of thumb, a word should 
occur at least three times before it is worth assigning it a token. 
Short worda can be given tokens too, as the space following the word 
can also be removed. (I found that in the demonstration program, the 
biggest memory saving from a single word was from the string "the ".) 
Once you have picked out your tokens, you might like to re-word your 
room descriptiona alightly, so that more tokens can be used. 

When you run the program, it will ask you to enter the tokens. It 
doesn’t matter what order you do this in, but I recommend you keep the 
words "А","АМ","ТНЕ" and "SOME" together as you will need these to 
describe gettable objects. It will also be useful to keep “NORTH", 
"SOUTH", "WEST" and "EAST" together. The program will create a DATA 
line containing the words you enter. 

You can then enter the room descriptions (in full, with the 
exception of the firat two worda - “You Are") and the program will 
search through the description word by word for tokens, and add data 
lines to itself containing the tokenised descriptions. Unless you want 
to use some other approach for the movement codes, you will need to 
place these at the end of each description. Each description will be 
on a single data line, despite the fact that many will be longer than 
sixty four characters. For this reason you will only be able to edit 
some of your descriptions (ao it is important to make sure they are 
correct), but the reading of the room descriptions by the program will 
be made a lot simpler. 

However, you will lose some of the flexability that you could have 
obtained by entering the data linea manually, as you will be unable to 
use tokens for parts of words. (For example if you had the token 
Cinverse & 1 for the group of letters "AND ", then "SAND " could be 
represented by "Ѕ(іпуегзе & 1". For this reason you might want to 
enter your data linea manually, as I did when I originally wrote the 
demonatration program, but it should not be too difficult to modify 
the tokens program so it can also handle this possibility. 

Another idea you might want to consider is to also tokenise the 
replies given by RS. These could be placed in a series of data lines 
placed after the room descriptions, and the verb subroutines could 
return a number representing that message. The program could then use 
the restore line number routine to read this message from the data 
statements before decoding and printing it. The tokenising program 
would need little or no modifications to accomodate this, but possibly 
the biggest advantage of this approach would be that players who list 
your program will have a hard time trying to cheat. 







t4. 


зары: a Л: 5 ITE. 
na ga еле ECT ci Re 






ҰҒЫ 
e. 


^ ui 
| thes 
n. 





D. you will need to read in. The 
the worda that have tokena have 


4800 READBS 
4819 ге-КІСНТ8(Вз,4) 


4820 IFES<"@" THENIS=JS+ES: NEXT: 


Here you will notice the use © 
occur at the end of a sentence, 
acreen they, like all of the 
apace. Іп thia case, the apace ie undes 
of the description. To do this we use 


F the movement codes at the end of it ia below. 


4830 IFES-"?",J8-LEFTS(JS,LEN (J8»-1)5*". 
4840 J8-J8*ZS(ASCCES) -191) : NEXT:RETURN 


or reading 


If you use the program to create your descriptions, then decoding 
E will be simple. If you don’t use it, 
E slightly more com lex b j | 

8 р ecause yoy will needits YoEEn gis beva™# ihe WPA 
(It assumes that all of 


then this will be made 


been read into the ZS array.) 


| 


| 


4815 FORI-i1TOLEN(BS)-4:ES-MIDS (BS,I,1) 


RETURN: REM @ IS INVERSED 


": NEXT: RETURN: * INVERSE ? 


£ the 64th token. Some tokens will 
but when they are written to the 
other tokens, will be followed by 4 
irable, 80 we must cut it out 
a special token (the inverse 


queation mark) to inatruct the computer to remove the preceeding apace 


before printing a £ull stop and 


another space. 


Because the program places each description 


there ів ПО particular reason why the movement 
An alternative way of representing the 


at the end of the deacription. 
movement codes would be as & 


out each movement code, atart off with it equal to zero, 
4 if there is an exit the south, 2 if 


there іа an exit to the north 
there із ап exit to the west, 


Possible ways of atoring the move 


of data atatementa, or in а 
code number, add 32 ао ії іг а 

this character ia in the VZ BA 
atring in the same order as the 


EXs- "$5"« CHRS(G4) *"X&,,8,,7/ 


To obtain the code you want: 
ЕХ - А5С( MIDS(EXS,R,1)) -32 


four bit number 


, 


and 1 if there 


string. to do t 
printable ASCII 
SIC Reference Ma 

room numbers. £ 


“,, 


То десіде if there ia ап exit or not: 


860 ЕО - EX AND (2^(4-D)) 


on a single data line, 
codes should be placed 


for each room. To work 
add 8 if 


is an exit to the east. 


ment codes are in an array or group 


hia, take each movement 
character, look up what 
nual, and place it in 4 
or example: 


-.x))üdl" +CHRS (34) 


870 IF EO>® THEN R=R+VAL(MIDS ("-505-101",D*2-1,2)) :RSz"OK" 


No, line 860 ia not ап error! 
having heard o£ the AND function asg it is not 
aome editions of the reference manual. The A 
bits of two numbers, and if both numbers h 


(equal to one) then the result 
eg. 13 AND 7 


13 1101 
7 0111 
= ©0101 (5) 


Therefore 13 AND 7 equala 5. 


If you still don’t understand, 


auch ав the one by Bob Kitch 





Some VZers could be excused for not 


very well documented in 


ND function compares the 
ave a particular bit set 


will also have that bit set. 


consult an article on logic operators, 
which appeared in VZDU #22 and а number 


EET И ra + MI acm 
бәке беу дА к ААЛА ЕШ kioii ыса Ба 





you do not have to use th 
icult to decipher for tha? 
ed quite easily: 


Of other  VZz publications. 
method in particular, 
trying to cheat, 


Of course, 
but it ia fairly diff 
and the exita can be alter 


EXS LEFTS(EXS, RM~1) + 


“(new character)" + MIDS (EXS, ВМ+1) 


The program to tokenise your room descriptions is below: 


1@ CLEAR 2000: BSS=CHRS (8) :RTS=CHRS (13) :S=65536!:E=33491-S 
200 INPUT"HOW MANY TOKENS (1963) 3 TK 


210 
220 
230 
240 
250 
260 
270 
280 
285 
287 
290 
300 
310 
320 
330 
340 
‚ 350 
36e 
370 
38e 
390 
400 
990 
1000 
1010 
1015 
1020 
1030 
1100 
1110 
1120 
1130 
1140 
1150 
1500 
1510 
1520 
1530 
1540 
1560 
1570 
1580 
1590 
1600 
1650 
2020 
2010 


IFTK<1 OR TK>63 THEN 200 
DIM TKS(TK) 
FOR T-1 TO TK 
PRINT "TOKEN NUMBER";T: 
INPUT TKS(T) 
NEXT T 
INPUT "DO YOU WANT A PRINTOUT (Y/N): ANS 
IF ANS="Y"THENGOSUB1000 
GOSUB 1100 
GOSUB3000 
PRINT "TYPE YOUR ROOM DESCRIPTION" 
GOSUB1500 
CLS:PRINTDES 
PRINT:INPUT"IS THIS CORRECT (Y/N)":ANS 
IF ANS-"N" THEN 299 
Трв="" 
GOSUB2000 
LN-LN*10: GOSUB3200 
INPUT “ANOTHER DESCRIPTION": ANS 
IF ANS<>"N" THEN CLS:GOTO290 
POKE28672, INT((E+S) /256) : POKE28673, E+S-256*PEEK (28672) 
POKE30969, PEEK (28673) : POKE30970, PEEK (28672) 
STOP 
FOR T=1 TO TK 
LPRINT USING"44"; T; 
LPRINT " "; CHRS$ (T*191);" "; 
NEXT 
RETURN 
INPUT "ARE THESE CORRECT NOW CY/N)":ANS 
IF ANS«»"N" THENRETURN 
INPUT "WHICH ONE IS INCORRECT":IN 
PRINT “TOKEN NUMBER": IN; 
INPUT TKSCIN) 
GOTO 1100 
INS-RTS:DES-"" 
PRINT Bg" ; 
OLS-INS:INS-INKEYS: 
INS-"" OR INS-OLS THEN 1520 
CINS<" " OR INS>"*") AND INS<>BSS AND INS<>RTS THEN 1520 
INS=BSS AND LENCDES)<>0e THEN DES=LEFTS (DES, LEN (DES) -1) 
INS=BSS THEN PRINT BSS; BSS; CHRS(127); “Mi: :GOTO1520 
INS=RTS OR LEN(DES)=255 THEN 1650 
DES=DES+INS: PRINT BSS; INS: "gee 
GOTO1520 
PRINTBSS;" ":RETURN 
15-1 
FOR LE=1 TO LENCDES) 
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2020 
2030 
2035 


2040 
2050 
2500 
2510 
2515 
2520 
2530 
2540 
2550 
2560 
2570 
2700 
2710 
3000 
3010 
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3030 
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3090 
3095 
3100 
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3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3295 
3300 





IFMIDS(DES,LE,1)=" "THEN GOSUB2500:LS=LE+1 
NEXT LE 
GOSUB2500 
PRINTTDS 
RETURN 
FS=0:WOS=MIDS(DES,LS,LE-LS) 
TERIGHT&(WOS,1)2"." THENFS21:WOS-LEFTS (VOS , LEN (VOS) 1? 
ТЕ=@ 
FOR I=1 TO TK 

IF WOS-TKS(I) THEN 
NEXT 
IF TR=1 AND FS=1 THEN TDS=TDS+" 
IF TR=OTHENTDS=TDS+WOS: IFFS=1THENTDS=TDS*"- 
RETURN 
HS=INT(LN/256) :LS=LN-(MS*256) :POKE E,LS: РОКЕ Еж1,М5 
POKE E+2,136: E=E+3: RETURN 
LN-4990:G0SUB2700 
FOR T=1 TO TK 

FOR L=1 TO LEN(TKS(T)) 

POKE E,ASC(MIDS(TKS(T),L,1)) 
Е=Е+1 

NEXT L 

IF T<>TK THEN POKE E,44:E=Erl 
NEXT T 
POKE E,0: РОКЕ Е+1,@: POKE E*2,9: EL-E*1: 
POKE33490-S,INT((E*S-2) /256) 
POKE33489-S, (E*S-2) -256 *PEEK (33490 9) 
RETURN 
GOSUB2700 
POKE E,34: E-E*1 
FOR B-1 TO LEN(TDS) 

POKE E,ASC(MIDS(TDS,B,1)) 


TRz1:TDS-TDS*CHRSC191*1) :I-TK 


E=E+3 


Е=Е +1 
МЕХТ В 
РОКЕ Е,34:Е=Е +1 
РОКЕ Е,д: POKE E+1,0: POKE E+2,0: E=E+3 
POKE EL+1,INT((E+S-2)/256) 


POKE EL,(E*S-2)-256*PEEK CEL*1) : EL-E72 
RETURN 
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Ке 
by 


isting. You don’t have to type it exactly as it 


Type in the above 1 
nce completed, check 


appears, but you may find it helpful to do во. 0 
the End Of Basic (EOB) pointer by typing: 


PRINT PEEK(30969) + 256 * PEEK (30970) 
Replace the value of E in line 10 with E-(the value of EOB) - S. 


As well as this replace the number 33490 which occurs in lines 30930 
and 3095 with the value of the EOB pointer MINUS one. replace the 
number 33489 in line 3095 with the value of the EOB pointer minus two. 

Now save your program, because if it has апу bugs it may crash. 
After you have done so, you muat set aside some memory for your tokens 
and for your room descriptions. You can be fairly generous with this 
as the program resets the EOB pointer to the new correct value once it 
haa finished. to do this type: 


POKE30970, PEEK(30970) * n 
thia will allocate (n timea 256) BYTES of memory, 80 if n equals 


eight, you have set aside 2K of memory. 

Work out which words you want tokenised then run the program. type 
the number of tokena you want to use, then each token one by one. If 
you request a printout, the program will dump each word and its token 
to a printer. (you will need a printer patch loaded.) If you made а 
mistake typing one of the worda = you can correct it by typing the 
number of the incorrect word, then the correct spelling. 

Now type your first room description. This doesn't use the normal 
INPUT. to edit the left arrow movea the cursor left AND rubea out. 
Don’t worry if a black blob is left in the description - they have no 
effect. Your description must be no longer than 255 characters. You 
will then be asked if the description is correct - if it isn’t you may 
type it again. After this the description with words replaced by 
tokens ia printed on the acreen, then you will be prompted if you.want 
to type another description. 

Uhen you have finished, type CLEAR to stabilise the pointers, then 
list your program. You will find the words you wish to be tokens on a 
single DATA line (4999) then each tokenised description ten lines 
apart etarting from line 5900. You can change this if you want to. 
Some of the lines will be longer than 64 characters and for this 


reason you won’t be able to edit some lines. 
Next delete all of the program except for the date statements by 


typing: 
о # 10 - 3300 
РОКЕ 31469,182 


RUN 
Then delete line e. 


You will then have a Bet of room descriptiona which may be saved 
to tape or diak. You can now add the reat of your program. 
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This is the "key" to the developement of the microprocesor. 


Іп early 1971 the only two standard LSI products were the first 
1K-bit dynamic ram and the UART (receiver/transmitter chip) had 
been developed. It was then that the microprocessor was 
accidentially introduced. The introduction in 1971 of the Intel 
4004, a 4-bit PMOS microprocessor resulted from a contract with a 
Japanese calculator manufacturer. They had to agree not to 
develope a calculator for one year. This chip was not powerful 
enough for a computer, being designed as a "general purpose 
microprocessor" for calculators. High sales were not expected, 
but they occurred. The next significant event was in 1972 when 
Intel introduced the 8008, the first general purpose 8 bit 
microprocessor. Display Terminals Corporation, now known as 
Datapoint, then a CRT display manufacturer, requested bids for the 
production of a monalithic processor capable of controlling a CTR. 
Two companies, Texas Instruments and Intel vied for and obtained 
the development contracts. After months of effort, Texas 
Instruments withdrew. Intel continued the development and came up 
with a component that could Satisfy all but one of Datapoint's 
functional requirements; it was too slow. At about the same time, 
a price war had started over the prices of bi-polar devices. For 
these reasons Datapoint decided to implement it's CRT controller 
in bi-polar technecology. Intel, then a very young company, was 
left with a chip, whose development had been paid for, but for 
Which there was no obvious market. Since Intel produced memory 
products, the 8008 was introduced on the market on the assumption 
that it would sell memory chips. All design efforts were halted 
and the design team were assigned to other tasks. That was to be 
the end of microprocessors at Intel. 


To the surprise of it's manufacturers (and of it's 
competitors) sales of the microprocessor progressed rapidly. Intel 
had stumbled, by accident, on the next standard LSI product, the 
microprocessor. Intel quickly realised the potential of the 
device, reassembled a design team and a year later introduced the 
successor to the 8008, the 8080. Simultaneously Intel's 
competitors set to work on their version of what the 8080 should 
have been had it been designed correctly for it's market. Within 
two years all the main "standard" 8-bit microcomputers had been 
introduced, most of them inspired by the early design of the 8080. 
Motorola introduced the 6800 nearly one year after the 8080, 
Rockwell 
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 Бре-в.5іспесісе the 2650 etc. 

In the third generation the succors to the 8080 were 
The Z80 from Zilog, the 8085 from Intel, and the 6809 
and the first 1-chip microcomputers the F8 from 
8048 from Intel, the TMS1000 and 


introduced. 
from Motorola, 
Fairchild and Mostek and the 
the9940 from Texas Instruments. 


Three of the 8080 designers left Intel and created their own 
company, ZILOG. The story of Zilog is similar to the story of most 
Silicon Valley companies. Started by a small group of engineers 
Zilog has grown to an important semiconductor company. It's first 
product was the 280 designed to compete with the 8080. The 
Z80incorporates the 8080,the 8224 clock and the 8228 system 
controller, and some additional facilities on a single chip. The 
780 instruction set is compatiable with the 8080 set. An 8080 ROM 
can run "as is" on the Z80 system, and the 780 has some additional 
instructions. Тһе standard 780 is as fast as the fast 8080. А 
faster version the 280А operates at 4MHz. The internal 
organization of the 780 is shown below. It closely follows the 
8080. It provies however one main  inprovement. It is equipped 
with two banks of registers. These registers can be used to 
provide either a large number of internal registers or a very fast 
response to a single level of interrupt. These banks are implanted 
correctly for interrupt handling. The accumulator and status 
registers are also duplicated. The 280 is also equipped with a 
memory refresh facility that allows certain dynamic RAMS to be 
connected directly to the system without the need for an external 


refresh circuit. 
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500 
510 
520 
550 
540 
550 
400 
410 
420 
450 
440 
450 
460 
470 
480 
490 
600 
610 
620 
630 
640 
650 
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«** — DISPLAY INVERSE CHARACTER кР 


жə. SET IN ROM wae 
кжж AS USED BY DOT MATRIX жж 
жж PRINTER кжж 
€ R. 8. KITCH 27/9/86 iila 


„эк жек эк эк эк эк эк Жк эк эк Эк эк ЖЕ эк эн э ЭЕ ЖЕ ЭЕ э ЭЕ ЭК TOR IORI Эй Ж ЭК ЖК ЭК ЖЕ ЭК ЭК 


‘WHEN INVERSE CHARACTERS ARE SENT TO A DOT MATRIX PRINTER 
‘THE PRINTER SHIFTS TO GRAPHICS MODE AND REQUIRES A ROUTINE 
‘TO SUPPLY THE APPROPRIATE SHAPES TO THE HEAD. (NORMAL 
‘CHARACTERS ARE HELD IN THE PRINTERS ROM) 

'IN THE VZ COMPUTER A TABLE OF SHAPES IS LOCATED AT 

'zB94H TO 5CD5 IN ROM. THERE ARE 64 CHARACTERS, EACH USING 
(Б BYTES TO DEFINE THEIR GRAPHIC SHAPE. THE SHAPES MAY BE 
‘DECODED AND OUTPUT TO THE SCREEN AS IS DONE IN THIS 
‘PROGRAM. NOTE THAT THERE ARE SOME ERRORS IN THE ROM. 

‘THE 5 BYTES DEFINE A 5 BY 8 DOT MATRIX WHICH IS THE SHAPE 
‘OF THE CHARACTER, WHICH INCIDENTLY ARE NOT ORDERED 


"ACCORDING TO THE ASCII CODE. 


'THE FIRST BYTE DEFINES THE LEFT HAND EDGE OF THE CHARACTER- 
‘WHICH IS THE FIRST PRINTED DURING A PASS OF THE PRINTER 
'HEAD. IN TANDY PRINTERS THE MSB IS THE LOWERMOST PIN OF THE 
'HEAD AND THE LSB IS THE UPPERMOST PIN. THE PINS ON EPSON 
'PRINTER HEADS ARE ARRANGED IN THE OPPOSITE SENSE. ТНІ5 
'REQUIRES THAT THE BITS IN EACH BYTE BE REVERSED. 


аакка жж ж жк эк эк жк ж эк эк ж кке кокк кк как кк к к жак oleo on n 


DIM MK9*(7) :'***VECTOR OF BIT MASK VALUES - POWERS OF 2 
DIM BT%(7) :'***VECTOR OF DECODED BITS FROM ROM VALUE. 


a*FILL MASK VECTOR WITH POWERS OF 2 FOR DECODING. 
FOR I2-0 TO 7 :MKZ(I2)22^I* :NEXI 1% 


«**INITIALIZE PARAMETERS - MAY BE CHANGED TO VARY SCREEN. 


СС%=4 2'***CHARACTER COLOUR. (1-4) 

ВС%-2 ,'***BACKGROUND COLOUR. (1-4) 

С5%=0 „COLOUR SET. (0-1) 

СМ%-5 SUGRCOLUMN. WIDTH BETWEEN CHARACTERS. 

SP%=16 ROW SPACING FOR CHARACTERS. 

Н5%-0 .'##** STARTING HORIZONTAL POSITION ON HI-RES SCREEN. 
NVP2=3 S STARTING VERTICAL POSITION ON HI-RES SCREEN. 
HMZ-127  :'***MAXIMUM HORIZONTAL POSITION. (0-127) 

'«-*SET UP MAIN LOOP TO STEP THROUGH ROM FROM 3B94H-3CD3. 
BK%=0 .'***BYTE COUNTER FOR EACH CHARACTER. 
HP%=HS% .'***SET HORIZONTAL POSITION TO START 
MODE (1) :COLOR,CS% S'***SET HI-RES SCREEN AND COLOR SET. 
FOR AD%=15252 TO 15571 :'***ROM ADDRESSES FOR SHAPE TABLE. 

DVZ=PEEK (ADA) S'*DECIMAL VALUE IN ROM. 
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660 ' 
700 '***DECODE THE INDIVIDUAL BITS OF DV% AND STORE IN BT£O. 
710 '***THE MASK VALUES IN MKZ() ARE "ANDED" WITH THE VALUE. 


720 '***THE RESULT STORED IN BT%() IS THE "COLOUR" OF THE BIT. 


750 FOR I%= O0 TO 7 :'***PROCEED FROM LSB TO MSB. 

740 IF DV% AND MK%(1%) THEN BT%(1%) =BC%Z ELSE BIZ(TR) =CC% 
750 NEXT I% | 

800 ' 


810 '***CHECK THAT THERE IS ENOUGH ROOM TO PLOT CHARACTER. 

820 IF BK%=0 АМО НМ%-НРФ%<4 ТНЕМ НРФ-Н5%4 :УРФ-УР%%5Р2: %МЕМ ROW 
850 ВК^=ВКА+1 :'***ТМСЕЕМЕМТ ВҮТЕ СООМТЕК. 

840" 

900 '***OUTPUT BYTE TO SCREEN. 

910 FOR I2-0 TO 7 


920 COLOR BTZCI?) 2 '***SET COLOUR OF BIT. 

930 SET CHP2, VP2+I%) «жЕр ВЕ: 

940 МЕХТ 1% 

950 ' 

1000 '***PREPARE FOR NEXT BYTE. 

1010 HPZ=HP%+ | 2 *** TNCREMENT HORIZONTAL POSITION. 
1020 IF BK%=5 THEN BKZ=0 :HPZ=HPZ+CWZ 2 '***NEW CHARACTER. 


1030 NEXT AD% 
2000 GOTO 2000 :END 


7.5 


TRADING POST 


FOR SALE. 


PRINTER. GP100. Dick Smith Graphic Printer. This model is 
completely conpatiable with the VZ. They were specially set-up for 
the VZ, and will produce INVERSE and GRAPHIC characters and copy 
the mode 1 and o screens. PRICE $120. 


PRINTER. SEIKOSHA GP250X graphic printer. This printer will print 
all ASCII characters from the VZ, and though it is a graphic 
printer we do not have a patch to make it compatiable with the VZ 
graphics or inverse characters. It will copy the Mode O screen, 
but not the Mode 1. It does however have a full forte of it’s own 
graphics. It will also print double height-double width 
characters. I don't doubt that a patch could be written for it. 
PRICE $100 or reasonable offer. | 


Postage will depend on where you live. Тһе weight is about SKG. 
Both have manuals for them. Insurance is $3. 


Get in touch with me. Harry. 


OTHER V Z USER GROUPS 


H.V.V.Z.U.6 DISKMAG 

Р.О.Вох 161 P.O.Box 600. 

JESMOND NSW. 2299. Taree NSW. 2430. 

CENT. VIC.COMP.Club BRISBANE VZUG 

24 Breen St. 63 Tingalpa St. 
BENDIGO VIC 5550 WYNUM West. Q'id. 4178 


Graeme Bywater 
P.O.Box 388 
MORLEY W.A. 6062 


